package MyApp::Model::Translate;

use strict;
use warnings;
use utf8;

require Exporter;
our @ISA = qw(Exporter);
our @EXPORT_OK = qw( translateSbuId translateUserRole );


sub translateSbuId {
	my $id = shift;
	my $name;
	return $name="总部" if $id =~ /001/;
	return $name="集团1" if $id =~ /002/;
	return $name="集团2" if $id =~ /003/;
	return $name="集团3" if $id =~ /004/;
	return $name="事业部1" if $id =~ /005/;
	return $name="事业部2" if $id =~ /006/;
	return $name="事业部3" if $id =~ /007/;
	return $name="事业部4" if $id =~ /008/;
	return $name="集团3二工厂" if $id =~ /009/;
	return $name="欧洲" if $id =~ /010/;
	return $name="事业部5" if $id =~ /011/;
	return $name="事业部6" if $id =~ /012/;
	return $name="测试事业部" if $id =~ /013/;
}


sub translateUserRole{
	my $id = shift;
	my $name;
	return $name="内部员工" if $id =~ /001/;
	return $name="经销商" if $id =~ /002/;
	return $name="服务商" if $id =~ /003/;
	return $name="供应商" if $id =~ /004/;
}

1